object Form1: TForm1 Left = 263 Top = 119 BorderStyle = bsSingle Caption = 'TEnhImage component DEMO' ClientHeight = 340 ClientWidth = 488 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu1 Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object original: TEnhImage Left = 4 Top = 172 Width = 220 Height = 165 Border = True Center = True OverSize = True ScaleStyle = ssScale end object Label1: TLabel Left = 232 Top = 16 Width = 48 Height = 13 Caption = 'Saturation' end object Label2: TLabel Left = 232 Top = 52 Width = 49 Height = 13 Caption = 'Brightness' end object Label3: TLabel Left = 232 Top = 88 Width = 39 Height = 13 Caption = 'Contrast' end object SatLab: TLabel Left = 448 Top = 16 Width = 21 Height = 13 Alignment = taRightJustify AutoSize = False Caption = '0' end object LigLab: TLabel Left = 448 Top = 52 Width = 21 Height = 13 Alignment = taRightJustify AutoSize = False Caption = '0' end object ConLab: TLabel Left = 448 Top = 88 Width = 21 Height = 13 Alignment = taRightJustify AutoSize = False Caption = '0' end object Label7: TLabel Left = 472 Top = 16 Width = 8 Height = 13 Caption = '%' end object Label8: TLabel Left = 472 Top = 52 Width = 8 Height = 13 Caption = '%' end object Label9: TLabel Left = 472 Top = 88 Width = 8 Height = 13 Caption = '%' end object temp: TEnhImage Left = 232 Top = 252 Width = 53 Height = 38 Border = True Center = True Picture.Data = {} ScaleStyle = ssScale Visible = False end object Label4: TLabel Left = 232 Top = 140 Width = 49 Height = 13 Caption = 'Brightness' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label5: TLabel Left = 232 Top = 216 Width = 48 Height = 13 Caption = 'Saturation' end object img: TEnhImage Left = 4 Top = 4 Width = 220 Height = 165 Border = True Center = True OverSize = True ScaleStyle = ssScale end object Label6: TLabel Left = 304 Top = 324 Width = 178 Height = 13 Caption = 'by Alfredo Milani-Comparetti - 1996-97' end object BitBtn1: TBitBtn Left = 400 Top = 292 Width = 75 Height = 25 TabOrder = 5 OnClick = BitBtn1Click Kind = bkClose end object Panel1: TPanel Left = 296 Top = 132 Width = 185 Height = 69 BorderWidth = 3 TabOrder = 0 object PaintBox1: TPaintBox Left = 4 Top = 4 Width = 177 Height = 61 Align = alClient Color = clBtnFace ParentColor = False OnPaint = PaintBox1Paint end end object Panel2: TPanel Left = 296 Top = 208 Width = 185 Height = 69 BorderWidth = 3 TabOrder = 1 object PaintBox2: TPaintBox Left = 4 Top = 4 Width = 177 Height = 61 Align = alClient Color = clBtnFace ParentColor = False OnPaint = PaintBox2Paint end end object saturation: TScrollBar Left = 292 Top = 16 Width = 153 Height = 14 LargeChange = 5 Min = -100 TabOrder = 2 OnChange = saturationChange end object lightness: TScrollBar Left = 292 Top = 52 Width = 153 Height = 14 LargeChange = 5 Min = -100 TabOrder = 3 OnChange = LightnessChange end object contrast: TScrollBar Left = 292 Top = 88 Width = 153 Height = 14 LargeChange = 5 Min = -100 TabOrder = 4 OnChange = ContrastChange end object MainMenu1: TMainMenu Left = 12 Top = 12 object Loadpicture1: TMenuItem Caption = '&File' ShortCut = 0 object Loadpicture2: TMenuItem Caption = '&Load picture' ShortCut = 0 OnClick = Loadpicture2Click end object N1: TMenuItem Caption = '-' ShortCut = 0 end object Exit1: TMenuItem Caption = '&Exit' ShortCut = 0 end end object Effects: TMenuItem Caption = '&Effects' ShortCut = 0 object FlipHorizontal1: TMenuItem Caption = 'Flip &horizontal' ShortCut = 0 OnClick = FlipHorizontalClick end object Flipvertical1: TMenuItem Caption = 'Flip &vertical' ShortCut = 0 OnClick = FlipVerticalClick end object Togray2: TMenuItem Caption = 'To &gray' ShortCut = 0 OnClick = ToGrayClick end object Invert1: TMenuItem Caption = '&Invert' ShortCut = 0 OnClick = invertClick end end end object OpenDlg: TOpenDialog DefaultExt = '*.j' FileEditStyle = fsEdit Filter = 'JPEG files|*.JPG|BMP files|*.BMP|Graphic files|*.JPG;*.BMP|Any f' + 'ile|*.*' Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist] Left = 44 Top = 12 end end